print("Give the complete path of the csv file: ")
filePath <- readline()
result <- read.csv(file=filePath,sep=",",head=TRUE)
#print(result)
result <- result[order(result$xval), ]
#print(result)
plot(result$xval, result$yval, main="Plot", type="b", xlab="x-axis", ylab="y-axis", col="blue")
